home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998 January: Mac OS SDK / Dev.CD Jan 98 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Universal / Interfaces / AIncludes / Editions.a < prev    next >
Encoding:
Text File  |  1997-08-12  |  17.9 KB  |  622 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        Editions.a
  3. ;
  4. ;    Contains:    Edition Manager Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Release:    Universal Interfaces 3.0.1
  8. ;
  9. ;    Copyright:    © 1989-1997 by Apple Computer, Inc., all rights reserved
  10. ;
  11. ;    Bugs?:        Please include the the file and version information (from above) with
  12. ;                the problem description.  Developers belonging to one of the Apple
  13. ;                developer programs can submit bug reports to:
  14. ;
  15. ;                    devsupport@apple.com
  16. ;
  17. ;
  18.     IF &TYPE('__EDITIONS__') = 'UNDEFINED' THEN
  19. __EDITIONS__ SET 1
  20.  
  21.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  22.     include 'Types.a'
  23.     ENDIF
  24.     IF &TYPE('__MIXEDMODE__') = 'UNDEFINED' THEN
  25.     include 'MixedMode.a'
  26.     ENDIF
  27.     IF &TYPE('__FILES__') = 'UNDEFINED' THEN
  28.     include 'Files.a'
  29.     ENDIF
  30.     IF &TYPE('__ALIASES__') = 'UNDEFINED' THEN
  31.     include 'Aliases.a'
  32.     ENDIF
  33.     IF &TYPE('__DIALOGS__') = 'UNDEFINED' THEN
  34.     include 'Dialogs.a'
  35.     ENDIF
  36.  
  37.  
  38.                                                             ; resource types  
  39. rSectionType                    EQU        'sect'                ; ResType of saved SectionRecords 
  40.                                                             ; Finder types for edition files 
  41. kPICTEditionFileType            EQU        'edtp'
  42. kTEXTEditionFileType            EQU        'edtt'
  43. ksndEditionFileType                EQU        'edts'
  44. kUnknownEditionFileType            EQU        'edtu'
  45. kPublisherDocAliasFormat        EQU        'alis'
  46. kPreviewFormat                    EQU        'prvw'
  47. kFormatListFormat                EQU        'fmts'
  48.  
  49.                                                             ; section types 
  50. stSubscriber                    EQU        $01
  51. stPublisher                        EQU        $0A
  52.  
  53. sumAutomatic                    EQU        0                    ; subscriber update mode - Automatically     
  54. sumManual                        EQU        1                    ; subscriber update mode - Manually 
  55. pumOnSave                        EQU        0                    ; publisher update mode - OnSave            
  56. pumManual                        EQU        1                    ; publisher update mode - Manually 
  57.  
  58. kPartsNotUsed                    EQU        0
  59. kPartNumberUnknown                EQU        -1
  60.  
  61. kPreviewWidth                    EQU        120
  62. kPreviewHeight                    EQU        120
  63.  
  64.                                                             ; bits for formatsMask 
  65. kPICTformatMask                    EQU        1
  66. kTEXTformatMask                    EQU        2
  67. ksndFormatMask                    EQU        4
  68.  
  69.  
  70.                                                             ; pseudo-item hits for dialogHooks the first is for NewPublisher or NewSubscriber Dialogs 
  71. emHookRedrawPreview                EQU        150                    ; the following are for SectionOptions Dialog 
  72. emHookCancelSection                EQU        160
  73. emHookGoToPublisher                EQU        161
  74. emHookGetEditionNow                EQU        162
  75. emHookSendEditionNow            EQU        162
  76. emHookManualUpdateMode            EQU        163
  77. emHookAutoUpdateMode            EQU        164
  78.  
  79.  
  80.                                                             ; the refcon field of the dialog record during a modalfilter or dialoghook contains one the following 
  81. emOptionsDialogRefCon            EQU        'optn'
  82. emCancelSectionDialogRefCon        EQU        'cncl'
  83. emGoToPubErrDialogRefCon        EQU        'gerr'
  84.  
  85. kFormatLengthUnknown            EQU        -1
  86. ;  one byte, stSubscriber or stPublisher 
  87. ; typedef SignedByte                     SectionType
  88.  
  89. ;  seconds since 1904 
  90. ; typedef unsigned long                 TimeStamp
  91.  
  92. ;  similar to ResType 
  93. ; typedef FourCharCode                     FormatType
  94.  
  95. ;  used in Edition I/O 
  96. ; typedef Handle                         EditionRefNum
  97.  
  98. ;  update modes 
  99. ;  sumAutomatic, pumSuspend, etc 
  100. ; typedef short                         UpdateMode
  101.  
  102.  
  103.  
  104. ; typedef SectionRecord *                SectionPtr
  105.  
  106. ; typedef SectionPtr *                    SectionHandle
  107.  
  108. SectionRecord            RECORD 0
  109. version                     ds.b    1                ; offset: $0 (0)        ;  always 0x01 in system 7.0 
  110. kind                     ds.b    1                ; offset: $1 (1)        ;  stSubscriber or stPublisher 
  111. mode                     ds.w    1                ; offset: $2 (2)        ;  auto or manual 
  112. mdDate                     ds.l    1                ; offset: $4 (4)        ;  last change in document 
  113. sectionID                 ds.l    1                ; offset: $8 (8)        ;  app. specific, unique per document 
  114. refCon                     ds.l    1                ; offset: $C (12)        ;  application specific 
  115. alias                     ds.l    1                ; offset: $10 (16)        ;  handle to Alias Record 
  116. subPart                     ds.l    1                ; offset: $14 (20)        ;  which part of container file 
  117. nextSection                 ds.l    1                ; offset: $18 (24)        ;  for linked list of app's Sections 
  118. controlBlock             ds.l    1                ; offset: $1C (28)        ;  used internally 
  119. refNum                     ds.l    1                ; offset: $20 (32)        ;  used internally 
  120. sizeof                     EQU *                    ; size:   $24 (36)
  121.                         ENDR
  122. EditionContainerSpec    RECORD 0
  123. theFile                     ds        FSSpec            ; offset: $0 (0)
  124. theFileScript             ds.w    1                ; offset: $46 (70)
  125. thePart                     ds.l    1                ; offset: $48 (72)
  126. thePartName                 ds        Str31            ; offset: $4C (76)
  127. thePartScript             ds.w    1                ; offset: $6C (108)
  128. sizeof                     EQU *                    ; size:   $6E (110)
  129.                         ENDR
  130. ; typedef struct EditionContainerSpec *    EditionContainerSpecPtr
  131.  
  132. EditionInfoRecord        RECORD 0
  133. crDate                     ds.l    1                ; offset: $0 (0)        ;  date EditionContainer was created 
  134. mdDate                     ds.l    1                ; offset: $4 (4)        ;  date of last change 
  135. fdCreator                 ds.l    1                ; offset: $8 (8)        ;  file creator 
  136. fdType                     ds.l    1                ; offset: $C (12)        ;  file type 
  137. container                 ds        EditionContainerSpec ; offset: $10 (16) ;  the Edition 
  138. sizeof                     EQU *                    ; size:   $7E (126)
  139.                         ENDR
  140. NewPublisherReply        RECORD 0
  141. canceled                 ds.b    1                ; offset: $0 (0)        ;  O 
  142. replacing                 ds.b    1                ; offset: $1 (1)
  143. usePart                     ds.b    1                ; offset: $2 (2)        ;  I 
  144. filler                     ds.b    1                ; offset: $3 (3)
  145. preview                     ds.l    1                ; offset: $4 (4)        ;  I 
  146. previewFormat             ds.l    1                ; offset: $8 (8)        ;  I 
  147. container                 ds        EditionContainerSpec ; offset: $C (12) ;  I/O 
  148. sizeof                     EQU *                    ; size:   $7A (122)
  149.                         ENDR
  150. NewSubscriberReply        RECORD 0
  151. canceled                 ds.b    1                ; offset: $0 (0)        ;  O 
  152. formatsMask                 ds.b    1                ; offset: $1 (1)
  153. container                 ds        EditionContainerSpec ; offset: $2 (2)    ; I/O
  154. sizeof                     EQU *                    ; size:   $70 (112)
  155.                         ENDR
  156. SectionOptionsReply        RECORD 0
  157. canceled                 ds.b    1                ; offset: $0 (0)        ;  O 
  158. changed                     ds.b    1                ; offset: $1 (1)        ;  O 
  159. sectionH                 ds.l    1                ; offset: $2 (2)        ;  I 
  160. action                     ds.l    1                ; offset: $6 (6)        ;  O 
  161. sizeof                     EQU *                    ; size:   $A (10)
  162.                         ENDR
  163.  
  164. ioHasFormat                        EQU        0
  165. ioReadFormat                    EQU        1
  166. ioNewFormat                        EQU        2
  167. ioWriteFormat                    EQU        3
  168. ; typedef SignedByte                     FormatIOVerb
  169.  
  170.  
  171. eoOpen                            EQU        0
  172. eoClose                            EQU        1
  173. eoOpenNew                        EQU        2
  174. eoCloseNew                        EQU        3
  175. eoCanSubscribe                    EQU        4
  176. ; typedef SignedByte                     EditionOpenerVerb
  177.  
  178. FormatIOParamBlock        RECORD 0
  179. ioRefNum                 ds.l    1                ; offset: $0 (0)
  180. format                     ds.l    1                ; offset: $4 (4)
  181. formatIndex                 ds.l    1                ; offset: $8 (8)
  182. offset                     ds.l    1                ; offset: $C (12)
  183. buffPtr                     ds.l    1                ; offset: $10 (16)
  184. buffLen                     ds.l    1                ; offset: $14 (20)
  185. sizeof                     EQU *                    ; size:   $18 (24)
  186.                         ENDR
  187.  
  188.  
  189. EditionOpenerParamBlock    RECORD 0
  190. info                     ds        EditionInfoRecord ; offset: $0 (0)
  191. sectionH                 ds.l    1                ; offset: $7E (126)
  192. document                 ds.l    1                ; offset: $82 (130)
  193. fdCreator                 ds.l    1                ; offset: $86 (134)
  194. ioRefNum                 ds.l    1                ; offset: $8A (138)
  195. ioProc                     ds.l    1                ; offset: $8E (142)
  196. success                     ds.b    1                ; offset: $92 (146)
  197. formatsMask                 ds.b    1                ; offset: $93 (147)
  198. sizeof                     EQU *                    ; size:   $94 (148)
  199.                         ENDR
  200. ;  
  201. ; Section events now arrive in the message buffer using the AppleEvent format.
  202. ; The direct object parameter is an aeTemporaryIDParamType ('tid '). The temporary
  203. ; ID's type is rSectionType ('sect') and the 32-bit value is a SectionHandle.
  204. ; The following is a sample buffer
  205. ; 
  206. ; name       offset     contents
  207. ; ----       ------     --------
  208. ; header           0      'aevt'
  209. ; majorVersion     4      0x01
  210. ; minorVersion     6      0x01
  211. ; endOfMetaData     8      ';;;;' 
  212. ; directObjKey     12  '----' 
  213. ; paramType      16  'tid ' 
  214. ; paramLength      20  0x0008 
  215. ; tempIDType      24  'sect' 
  216. ; tempID            28  the SectionHandle <-- this is want you want
  217. ;
  218.  
  219.  
  220.  
  221. sectionEventMsgClass            EQU        'sect'
  222. sectionReadMsgID                EQU        'read'
  223. sectionWriteMsgID                EQU        'writ'
  224. sectionScrollMsgID                EQU        'scrl'
  225. sectionCancelMsgID                EQU        'cncl'
  226.  
  227. currentEditionMgrVers            EQU        $0011
  228.  
  229.  
  230. ;
  231. ; pascal OSErr InitEditionPackVersion(short curEditionMgrVers)
  232. ;
  233.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  234.         Macro
  235.         _InitEditionPackVersion
  236.             move.w              #$0100,D0
  237.             dc.w                $A82D
  238.         EndM
  239.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  240.         IMPORT_CFM_FUNCTION InitEditionPackVersion
  241.     ENDIF
  242.  
  243. ;
  244. ; pascal OSErr NewSection(const EditionContainerSpec *container, ConstFSSpecPtr sectionDocument, SectionType kind, long sectionID, UpdateMode initalMode, SectionHandle *sectionH)
  245. ;
  246.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  247.         Macro
  248.         _NewSection
  249.             move.w              #$0A02,D0
  250.             dc.w                $A82D
  251.         EndM
  252.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  253.         IMPORT_CFM_FUNCTION NewSection
  254.     ENDIF
  255.  
  256. ;
  257. ; pascal OSErr RegisterSection(const FSSpec *sectionDocument, SectionHandle sectionH, Boolean *aliasWasUpdated)
  258. ;
  259.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  260.         Macro
  261.         _RegisterSection
  262.             move.w              #$0604,D0
  263.             dc.w                $A82D
  264.         EndM
  265.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  266.         IMPORT_CFM_FUNCTION RegisterSection
  267.     ENDIF
  268.  
  269. ;
  270. ; pascal OSErr UnRegisterSection(SectionHandle sectionH)
  271. ;
  272.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  273.         Macro
  274.         _UnRegisterSection
  275.             move.w              #$0206,D0
  276.             dc.w                $A82D
  277.         EndM
  278.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  279.         IMPORT_CFM_FUNCTION UnRegisterSection
  280.     ENDIF
  281.  
  282. ;
  283. ; pascal OSErr IsRegisteredSection(SectionHandle sectionH)
  284. ;
  285.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  286.         Macro
  287.         _IsRegisteredSection
  288.             move.w              #$0208,D0
  289.             dc.w                $A82D
  290.         EndM
  291.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  292.         IMPORT_CFM_FUNCTION IsRegisteredSection
  293.     ENDIF
  294.  
  295. ;
  296. ; pascal OSErr AssociateSection(SectionHandle sectionH, const FSSpec *newSectionDocument)
  297. ;
  298.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  299.         Macro
  300.         _AssociateSection
  301.             move.w              #$040C,D0
  302.             dc.w                $A82D
  303.         EndM
  304.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  305.         IMPORT_CFM_FUNCTION AssociateSection
  306.     ENDIF
  307.  
  308. ;
  309. ; pascal OSErr CreateEditionContainerFile(const FSSpec *editionFile, OSType fdCreator, ScriptCode editionFileNameScript)
  310. ;
  311.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  312.         Macro
  313.         _CreateEditionContainerFile
  314.             move.w              #$050E,D0
  315.             dc.w                $A82D
  316.         EndM
  317.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  318.         IMPORT_CFM_FUNCTION CreateEditionContainerFile
  319.     ENDIF
  320.  
  321. ;
  322. ; pascal OSErr DeleteEditionContainerFile(const FSSpec *editionFile)
  323. ;
  324.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  325.         Macro
  326.         _DeleteEditionContainerFile
  327.             move.w              #$0210,D0
  328.             dc.w                $A82D
  329.         EndM
  330.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  331.         IMPORT_CFM_FUNCTION DeleteEditionContainerFile
  332.     ENDIF
  333.  
  334. ;
  335. ; pascal OSErr OpenEdition(SectionHandle subscriberSectionH, EditionRefNum *refNum)
  336. ;
  337.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  338.         Macro
  339.         _OpenEdition
  340.             move.w              #$0412,D0
  341.             dc.w                $A82D
  342.         EndM
  343.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  344.         IMPORT_CFM_FUNCTION OpenEdition
  345.     ENDIF
  346.  
  347. ;
  348. ; pascal OSErr OpenNewEdition(SectionHandle publisherSectionH, OSType fdCreator, ConstFSSpecPtr publisherSectionDocument, EditionRefNum *refNum)
  349. ;
  350.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  351.         Macro
  352.         _OpenNewEdition
  353.             move.w              #$0814,D0
  354.             dc.w                $A82D
  355.         EndM
  356.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  357.         IMPORT_CFM_FUNCTION OpenNewEdition
  358.     ENDIF
  359.  
  360. ;
  361. ; pascal OSErr CloseEdition(EditionRefNum whichEdition, Boolean successful)
  362. ;
  363.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  364.         Macro
  365.         _CloseEdition
  366.             move.w              #$0316,D0
  367.             dc.w                $A82D
  368.         EndM
  369.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  370.         IMPORT_CFM_FUNCTION CloseEdition
  371.     ENDIF
  372.  
  373. ;
  374. ; pascal OSErr EditionHasFormat(EditionRefNum whichEdition, FormatType whichFormat, Size *formatSize)
  375. ;
  376.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  377.         Macro
  378.         _EditionHasFormat
  379.             move.w              #$0618,D0
  380.             dc.w                $A82D
  381.         EndM
  382.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  383.         IMPORT_CFM_FUNCTION EditionHasFormat
  384.     ENDIF
  385.  
  386. ;
  387. ; pascal OSErr ReadEdition(EditionRefNum whichEdition, FormatType whichFormat, void *buffPtr, Size *buffLen)
  388. ;
  389.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  390.         Macro
  391.         _ReadEdition
  392.             move.w              #$081A,D0
  393.             dc.w                $A82D
  394.         EndM
  395.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  396.         IMPORT_CFM_FUNCTION ReadEdition
  397.     ENDIF
  398.  
  399. ;
  400. ; pascal OSErr WriteEdition(EditionRefNum whichEdition, FormatType whichFormat, const void *buffPtr, Size buffLen)
  401. ;
  402.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  403.         Macro
  404.         _WriteEdition
  405.             move.w              #$081C,D0
  406.             dc.w                $A82D
  407.         EndM
  408.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  409.         IMPORT_CFM_FUNCTION WriteEdition
  410.     ENDIF
  411.  
  412. ;
  413. ; pascal OSErr GetEditionFormatMark(EditionRefNum whichEdition, FormatType whichFormat, unsigned long *currentMark)
  414. ;
  415.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  416.         Macro
  417.         _GetEditionFormatMark
  418.             move.w              #$061E,D0
  419.             dc.w                $A82D
  420.         EndM
  421.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  422.         IMPORT_CFM_FUNCTION GetEditionFormatMark
  423.     ENDIF
  424.  
  425. ;
  426. ; pascal OSErr SetEditionFormatMark(EditionRefNum whichEdition, FormatType whichFormat, unsigned long setMarkTo)
  427. ;
  428.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  429.         Macro
  430.         _SetEditionFormatMark
  431.             move.w              #$0620,D0
  432.             dc.w                $A82D
  433.         EndM
  434.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  435.         IMPORT_CFM_FUNCTION SetEditionFormatMark
  436.     ENDIF
  437.  
  438. ;
  439. ; pascal OSErr GetEditionInfo(SectionHandle sectionH, EditionInfoRecord *editionInfo)
  440. ;
  441.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  442.         Macro
  443.         _GetEditionInfo
  444.             move.w              #$0422,D0
  445.             dc.w                $A82D
  446.         EndM
  447.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  448.         IMPORT_CFM_FUNCTION GetEditionInfo
  449.     ENDIF
  450.  
  451. ;
  452. ; pascal OSErr GoToPublisherSection(const EditionContainerSpec *container)
  453. ;
  454.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  455.         Macro
  456.         _GoToPublisherSection
  457.             move.w              #$0224,D0
  458.             dc.w                $A82D
  459.         EndM
  460.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  461.         IMPORT_CFM_FUNCTION GoToPublisherSection
  462.     ENDIF
  463.  
  464. ;
  465. ; pascal OSErr GetLastEditionContainerUsed(EditionContainerSpec *container)
  466. ;
  467.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  468.         Macro
  469.         _GetLastEditionContainerUsed
  470.             move.w              #$0226,D0
  471.             dc.w                $A82D
  472.         EndM
  473.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  474.         IMPORT_CFM_FUNCTION GetLastEditionContainerUsed
  475.     ENDIF
  476.  
  477. ;
  478. ; pascal OSErr GetStandardFormats(const EditionContainerSpec *container, FormatType *previewFormat, Handle preview, Handle publisherAlias, Handle formats)
  479. ;
  480.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  481.         Macro
  482.         _GetStandardFormats
  483.             move.w              #$0A28,D0
  484.             dc.w                $A82D
  485.         EndM
  486.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  487.         IMPORT_CFM_FUNCTION GetStandardFormats
  488.     ENDIF
  489.  
  490. ;
  491. ; pascal OSErr GetEditionOpenerProc(EditionOpenerUPP *opener)
  492. ;
  493.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  494.         Macro
  495.         _GetEditionOpenerProc
  496.             move.w              #$022A,D0
  497.             dc.w                $A82D
  498.         EndM
  499.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  500.         IMPORT_CFM_FUNCTION GetEditionOpenerProc
  501.     ENDIF
  502.  
  503. ;
  504. ; pascal OSErr SetEditionOpenerProc(EditionOpenerUPP opener)
  505. ;
  506.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  507.         Macro
  508.         _SetEditionOpenerProc
  509.             move.w              #$022C,D0
  510.             dc.w                $A82D
  511.         EndM
  512.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  513.         IMPORT_CFM_FUNCTION SetEditionOpenerProc
  514.     ENDIF
  515.  
  516. ;
  517. ; pascal OSErr CallEditionOpenerProc(EditionOpenerVerb selector, EditionOpenerParamBlock *PB, EditionOpenerUPP routine)
  518. ;
  519.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  520.         Macro
  521.         _CallEditionOpenerProc
  522.             move.w              #$052E,D0
  523.             dc.w                $A82D
  524.         EndM
  525.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  526.         IMPORT_CFM_FUNCTION CallEditionOpenerProc
  527.     ENDIF
  528.  
  529. ;
  530. ; pascal OSErr CallFormatIOProc(FormatIOVerb selector, FormatIOParamBlock *PB, FormatIOUPP routine)
  531. ;
  532.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  533.         Macro
  534.         _CallFormatIOProc
  535.             move.w              #$0530,D0
  536.             dc.w                $A82D
  537.         EndM
  538.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  539.         IMPORT_CFM_FUNCTION CallFormatIOProc
  540.     ENDIF
  541.  
  542. ;
  543. ; pascal OSErr NewSubscriberDialog(NewSubscriberReply *reply)
  544. ;
  545.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  546.         Macro
  547.         _NewSubscriberDialog
  548.             move.w              #$0232,D0
  549.             dc.w                $A82D
  550.         EndM
  551.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  552.         IMPORT_CFM_FUNCTION NewSubscriberDialog
  553.     ENDIF
  554.  
  555. ;
  556. ; pascal OSErr NewSubscriberExpDialog(NewSubscriberReply *reply, Point where, short expansionDITLresID, ExpDlgHookUPP dlgHook, ExpModalFilterUPP filter, void *yourDataPtr)
  557. ;
  558.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  559.         Macro
  560.         _NewSubscriberExpDialog
  561.             move.w              #$0B34,D0
  562.             dc.w                $A82D
  563.         EndM
  564.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  565.         IMPORT_CFM_FUNCTION NewSubscriberExpDialog
  566.     ENDIF
  567.  
  568. ;
  569. ; pascal OSErr NewPublisherDialog(NewPublisherReply *reply)
  570. ;
  571.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  572.         Macro
  573.         _NewPublisherDialog
  574.             move.w              #$0236,D0
  575.             dc.w                $A82D
  576.         EndM
  577.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  578.         IMPORT_CFM_FUNCTION NewPublisherDialog
  579.     ENDIF
  580.  
  581. ;
  582. ; pascal OSErr NewPublisherExpDialog(NewPublisherReply *reply, Point where, short expansionDITLresID, ExpDlgHookUPP dlgHook, ExpModalFilterUPP filter, void *yourDataPtr)
  583. ;
  584.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  585.         Macro
  586.         _NewPublisherExpDialog
  587.             move.w              #$0B38,D0
  588.             dc.w                $A82D
  589.         EndM
  590.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  591.         IMPORT_CFM_FUNCTION NewPublisherExpDialog
  592.     ENDIF
  593.  
  594. ;
  595. ; pascal OSErr SectionOptionsDialog(SectionOptionsReply *reply)
  596. ;
  597.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  598.         Macro
  599.         _SectionOptionsDialog
  600.             move.w              #$023A,D0
  601.             dc.w                $A82D
  602.         EndM
  603.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  604.         IMPORT_CFM_FUNCTION SectionOptionsDialog
  605.     ENDIF
  606.  
  607. ;
  608. ; pascal OSErr SectionOptionsExpDialog(SectionOptionsReply *reply, Point where, short expansionDITLresID, ExpDlgHookUPP dlgHook, ExpModalFilterUPP filter, void *yourDataPtr)
  609. ;
  610.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  611.         Macro
  612.         _SectionOptionsExpDialog
  613.             move.w              #$0B3C,D0
  614.             dc.w                $A82D
  615.         EndM
  616.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  617.         IMPORT_CFM_FUNCTION SectionOptionsExpDialog
  618.     ENDIF
  619.  
  620.     ENDIF ; __EDITIONS__ 
  621.  
  622.